home *** CD-ROM | disk | FTP | other *** search
/ Red Eye Press Kit / Red Eye Press Kit.iso / pc / main.dxr / SCRIPTS_17_Thumbnails (DOWNLOADS).ls < prev    next >
Encoding:
Text File  |  2005-07-18  |  2.2 KB  |  88 lines
  1. property mediaFolder, downloadFile, xTension, xSprite, xLib, i, o, saveState, downloadItem
  2. global downloadList
  3.  
  4. on getPropertyDescriptionList me
  5.   description = [:]
  6.   addProp(description, #mediaFolder, [#default: EMPTY, #format: #string, #comment: "FOLDER:"])
  7.   addProp(description, #xTension, [#default: EMPTY, #format: #string, #comment: ".EXT:"])
  8.   return description
  9. end
  10.  
  11. on runPropertyDialog me, description
  12.   myFile = new(xtra("fileio"))
  13.   fileLink = displayOpen(myFile)
  14.   myFile = 0
  15.   the itemDelimiter = fileSeperator()
  16.   mediaFolder = fileLink.item[fileLink.item.count - 1]
  17.   downloadFile = fileLink.item[fileLink.item.count]
  18.   the itemDelimiter = "."
  19.   xTension = downloadFile.item[2]
  20.   downloadFile = downloadFile.item[1]
  21.   setaProp(description, #mediaFolder, mediaFolder)
  22.   setaProp(description, #downloadFile, downloadFile)
  23.   setaProp(description, #xTension, xTension)
  24.   return description
  25. end
  26.  
  27. on beginSprite me
  28.   xSprite = me.spriteNum
  29.   i = sprite(xSprite).member.name & "-RO"
  30.   o = sprite(xSprite).member.name
  31.   xLib = sprite(xSprite).castLibNum
  32.   saveState = 0
  33.   downloadFile = o
  34.   downloadItem = [mediaFolder, downloadFile, xTension]
  35.   updateThumbnail()
  36. end
  37.  
  38. on mouseWithin me
  39.   sprite(xSprite).member = member(i, xLib)
  40.   sendAllSprites(#crossHair, "TRUE")
  41.   cursor(280)
  42. end
  43.  
  44. on mouseLeave me
  45.   if saveState = 0 then
  46.     sprite(xSprite).member = member(o, xLib)
  47.   else
  48.     sprite(xSprite).member = member(i, xLib)
  49.   end if
  50.   sendAllSprites(#crossHair, "FALSE")
  51.   cursor(0)
  52. end
  53.  
  54. on endSprite me
  55.   sendAllSprites(#crossHair, "FALSE")
  56.   cursor(0)
  57. end
  58.  
  59. on mouseUp me
  60.   if saveState = 0 then
  61.     saveState = 1
  62.     downloadList.add(downloadItem)
  63.   else
  64.     saveState = 0
  65.     downloadList.deleteAt(downloadList.getPos(downloadItem))
  66.   end if
  67. end
  68.  
  69. on updateThumbnail me, selectAll
  70.   if selectAll = "ALL" then
  71.     if downloadList.getPos(downloadItem) = 0 then
  72.       saveState = 1
  73.       downloadList.add(downloadItem)
  74.     end if
  75.   end if
  76.   if selectAll = "NONE" then
  77.     saveState = 0
  78.     downloadList = []
  79.     sprite(xSprite).member = member(o, xLib)
  80.   end if
  81.   repeat with x = 1 to downloadList.count
  82.     if sprite(xSprite).member.name = downloadList[x][2] then
  83.       saveState = 1
  84.       sprite(xSprite).member = member(i, xLib)
  85.     end if
  86.   end repeat
  87. end
  88.